home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / storage / function / cdrom / testmed.cmd < prev    next >
Encoding:
Text File  |  1994-08-24  |  1.6 KB  |  64 lines
  1. /* REXX COMMAND FILE THAT WILL RUN THE DDTT DEVICE DRIVER PROGRAM. */
  2.  
  3. call RxFuncAdd "SysLoadFuncs","RexxUtil","SysLoadFuncs"
  4. call SysLoadFuncs
  5. call SysCls
  6.  
  7. LineNum = "2"
  8. pos = SysCurPos(LineNum,6)
  9. SAY "THIS COMMAND FILE TESTS CDROM DEVICE DRIVERS.  THIS PROGRAM"
  10. LineNum = LineNum + 1
  11. pos = SysCurPos(LineNum,6)
  12. SAY "RUNS SCRIPT FILES WHICH EXERCISE CDROM FUNCTIONS."
  13. LineNum = LineNum + 1
  14. pos = SysCurPos(LineNum,6)
  15. SAY "YOU WILL NEED A DATA DISK TO EXECUTE THESE FUNCTIONS."
  16. LineNum = LineNum + 1
  17. pos = SysCurPos(LineNum,6)
  18. SAY "EXECUTE ALL FUNCTIONS."
  19.  
  20. J=1
  21. CALL SETINFO.CMD  J, LINENUM
  22.  
  23. SAY " "
  24. SAY " "
  25. SAY "      PLEASE PLACE A DATA DISK IN THE CDROM DRIVE AND CLOSE THE DRIVE."
  26. SAY "      PRESS ENTER WHEN YOU HAVE FINISHED."
  27. PULL PRESSKEY
  28.  
  29.  
  30. /*------------------------CDROM MEDIA TEST SCRIPTS------------------------*/
  31.  
  32. "DDTT RD2048T1.SCR"
  33. "DDTT RD2048T2.SCR"
  34. "DDTT RD2048T3.SCR"
  35. "DDTT RD2048T4.SCR"
  36. "DDTT RDFILET1.SCR"
  37. "DDTT RDFILET2.SCR"
  38. "DDTT RDFILET3.SCR"
  39. "DDTT RDFILET4.SCR"
  40. "DDTT RD23SCT1.SCR"
  41. "DDTT RD23SCT2.SCR"
  42. "DDTT RD23SCT3.SCR"
  43. "DDTT RD23SCT4.SCR"
  44. "DDTT RDPRSCT1.SCR"
  45. "DDTT RDPRSCT2.SCR"
  46. "DDTT RDPRSCT3.SCR"
  47.  
  48. /*-------------------------EJECTING THE CDROM DISK------------------------*/
  49.  
  50. "DDTT EJECT.SCR"
  51. /*--------------------------END OF  TEST SCRIPTS---------------------------*/
  52.  
  53. /*---------------------SEARCH  TEST SCRIPTS FOR ERRORS---------------------*/
  54.  
  55. "@CLS"
  56. SAY " "
  57. SAY "      SEARCHING LOG FILES FOR ANY ERROR MESSAGES...."
  58. SAY " "
  59. call search 'ERROR', '*.LOG', 'RESULTS2.TXT'
  60. "TYPE RESULTS2.TXT|MORE"
  61.  
  62. EXIT
  63. /*  DONE        */
  64.